From: Gerd Moellmann <gerd@gnu.org>
Date: Fri, 7 Sep 2001 11:32:18 +0000 (+0000)
Subject: (edebug-window-live-p): Use
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~62155
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b4ae66334c411c1bfbacffd3800906bcfa382bec;p=emacs.git

(edebug-window-live-p): Use
get-window-with-predicate.
---

diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index 70f76e96f32..cdd27c48382 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -307,7 +307,7 @@ A lambda list keyword is a symbol that starts with `&'."
 
 (defun edebug-window-live-p (window)
   "Return non-nil if WINDOW is visible."
-  (some-window (lambda (w) (eq w window))))
+  (get-window-with-predicate (lambda (w) (eq w window))))
 
 ;; Not used.
 '(defun edebug-two-window-p ()